# StartTCL: c
#
#
#
# Name:		AOcommands.tcl
# 
# Version:	1.6 Edited
#
# Description:	some new commands for sets and some spell/skill
#
# Authors: AdonOger Edited and added by Iceman
#
# conect: razb13@walla.com(msn or email)(iceman4love77@yahoo.com)
#
# change log: 
#
#v1.6 Edited added learn all spell by class!
#
#v1.6: add pvp sets ! and remove the bc command cuz .b
#
#v1.5.2: change the command .broadcast to .bc (work with both of them)
#and the commands setspawndist and setspawn time to .sd and .st 
#
#v1.5.1: change the command .resurrect to .res (work with both of them)
#
#v1.5:add commands professions deleter
#
#v1.4:add sets tier 3 and tier 1
#
#v1.3:new commands .maxxskill set def and all that shit to max
#
#v1.2:new commands .learnallform added learn all Shapeshift spell for gm
#
#v1.1:shaman set fixed 
#
#v1.0:only tier 2 here
#


::Custom::AddCommand {
        "spellmage1" ::WoWEmu::Commands::spellmage1 4
        "learnallform" ::WoWEmu::Commands::learnallform 4
        "t2warrior" ::WoWEmu::Commands::t2warrior 4
        "t2paladin" ::WoWEmu::Commands::t2paladin 4
        "t2shaman" ::WoWEmu::Commands::t2shaman 4
        "t2priest" ::WoWEmu::Commands::t2priest 4
        "t2druid" ::WoWEmu::Commands::t2druid 4
        "t2mage" ::WoWEmu::Commands::t2mage 4
        "t2warlock" ::WoWEmu::Commands::t2warlock 4
        "t2hunter" ::WoWEmu::Commands::t2hunter 4
        "t2rogue" ::WoWEmu::Commands::t2rogue 4
        "t3warrior" ::WoWEmu::Commands::t3warrior 4
        "t3druid" ::WoWEmu::Commands::t3druid 4
        "t3hunter" ::WoWEmu::Commands::t3hunter 4
        "t3shaman" ::WoWEmu::Commands::t3shaman 4
        "t3paladin" ::WoWEmu::Commands::t3paladin 4
        "t3warlock" ::WoWEmu::Commands::t3warlock 4
        "t3mage" ::WoWEmu::Commands::t3mage 4
        "t3priest" ::WoWEmu::Commands::t3priest 4
        "t3rogue" ::WoWEmu::Commands::t3rogue 4
        "t1warrior" ::WoWEmu::Commands::t1warrior 4
        "t1paladin" ::WoWEmu::Commands::t1paladin 4
        "t1druid" ::WoWEmu::Commands::t1druid 4
        "t1hunter" ::WoWEmu::Commands::t1hunter 4
        "maxskill" ::WoWEmu::Commands::maxskill 4
        "t1mage" ::WoWEmu::Commands::t1mage 4
        "t1priest" ::WoWEmu::Commands::t1priest 4
        "t1rogue" ::WoWEmu::Commands::t1rogue 4
        "t1shaman" ::WoWEmu::Commands::t1shaman 4
        "t1warlock" ::WoWEmu::Commands::t1warlock 4
        "delbs" ::WoWEmu::Commands::delbs 4
        "delalchemy" ::WoWEmu::Commands::delalchemy 4
        "delenchant" ::WoWEmu::Commands::delenchant 4
        "delherbalism" ::WoWEmu::Commands::delherbalism 4
        "delleatherw" ::WoWEmu::Commands::delleatherw 4
        "delMining" ::WoWEmu::Commands::delMining 4
        "delTailoring" ::WoWEmu::Commands::delTailoring 4
        "delEngineering" ::WoWEmu::Commands::delEngineering 4
        "delfaid" ::WoWEmu::Commands::delfaid 4
        "delCooking" ::WoWEmu::Commands::delCooking 4
        "delFishing" ::WoWEmu::Commands::delFishing 4
        "delSkining" ::WoWEmu::Commands::delSkining 4
	"deltale" ::WoWEmu::Commands::deltale 4 
        "res" ::WoWEmu::Commands::res 2
	"sd" ::WoWEmu::Commands::sd 4
	"st" ::WoWEmu::Commands::st 4
        "apdruid" ::WoWEmu::Commands::apdruid 4
        "hpdruid" ::WoWEmu::Commands::hpdruid 4
        "hphunter" ::WoWEmu::Commands::hphunter 4
        "aphunter" ::WoWEmu::Commands::aphunter 4
        "hpmage" ::WoWEmu::Commands::hpmage 4
        "apmage" ::WoWEmu::Commands::apmage 4
        "pvpaladin" ::WoWEmu::Commands::pvpaladin 4
        "hppriest" ::WoWEmu::Commands::hppriest 4
        "appriest" ::WoWEmu::Commands::appriest 4
        "hprogue" ::WoWEmu::Commands::hprogue 4
        "aprogue" ::WoWEmu::Commands::aprogue 4
        "pvshaman" ::WoWEmu::Commands::pvshaman 4
        "hpwarlock" ::WoWEmu::Commands::hpwarlock 4
        "apwarlock" ::WoWEmu::Commands::apwarlock 4
        "hpwarrior" ::WoWEmu::Commands::hpwarrior 4
        "apwarrior" ::WoWEmu::Commands::apwarrior 4
}

#
# player level 4
#
#	proc ::WoWEmu::Commands::spellmage1 { player cargs }
#
proc ::WoWEmu::Commands::spellmage1 { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Der Spieler ist kein GM!" ]
	}

	::LearnSpell $target 1168
	::LearnSpell $target 1142
	::LearnSpell $target 1173
	::LearnSpell $target 1174
	::LearnSpell $target 1194
	::LearnSpell $target 1249
	::LearnSpell $target 1424
	::LearnSpell $target 1472
	::LearnSpell $target 2141
	::LearnSpell $target 3128
	::LearnSpell $target 5146
	::LearnSpell $target 5507
	::LearnSpell $target 6116
		::LearnSpell $target 10055
	::LearnSpell $target 10056
	::LearnSpell $target 1241
	::LearnSpell $target 1035
	::LearnSpell $target 1176
	::LearnSpell $target 1194
	::LearnSpell $target 1196
	::LearnSpell $target 1210
	::LearnSpell $target 1214
	::LearnSpell $target 1266
	::LearnSpell $target 1267
	::LearnSpell $target 1268
	::LearnSpell $target 1269
		::LearnSpell $target 1467
	::LearnSpell $target 1481
	::LearnSpell $target 1811
	::LearnSpell $target 2124
	::LearnSpell $target 2858
	::LearnSpell $target 3128
	::LearnSpell $target 3553
	::LearnSpell $target 5146
	::LearnSpell $target 6144
	::LearnSpell $target 10059
        return [ ::Texts::Get "Yea! Du hast alle Magier Zauber LvL1 erlernt" ]
}

#	proc ::WoWEmu::Commands::learnallform { player cargs }
#
proc ::WoWEmu::Commands::learnallform { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Der Spieler ist kein GM!" ]
	}

	::LearnSpell $target 768
	::LearnSpell $target 775
	::LearnSpell $target 783
	::LearnSpell $target 1066
	::LearnSpell $target 3287
	::LearnSpell $target 3329
	::LearnSpell $target 5142
	::LearnSpell $target 5487
	::LearnSpell $target 6405
	::LearnSpell $target 16421
	::LearnSpell $target 22660
	::LearnSpell $target 9634
	::LearnSpell $target 24858
        return [ ::Texts::Get "Yea! you now learned all Shapeshift skills" ]
}

#	proc ::WoWEmu::Commands::t2warrior { player cargs }
#
proc ::WoWEmu::Commands::t2warrior { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16959
	::AddItem $target 16960
        ::AddItem $target 16961
        ::AddItem $target 16962
	::AddItem $target 16963
	::AddItem $target 16964
        ::AddItem $target 16965
        ::AddItem $target 16966
	return [ ::Texts::Get "Du hast jetzt das tier 2 Krieger set" ]
}

#	proc ::WoWEmu::Commands::t2paladin { player cargs }
#
proc ::WoWEmu::Commands::t2paladin { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16958
	::AddItem $target 16957
        ::AddItem $target 16956
        ::AddItem $target 16955
	::AddItem $target 16954
	::AddItem $target 16953
        ::AddItem $target 16952
        ::AddItem $target 16951
	return [ ::Texts::Get "Du hast jetzt das tier 2 paladin set" ]
}

#	proc ::WoWEmu::Commands::t2shaman { player cargs }
#
proc ::WoWEmu::Commands::t2shaman { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16944
	::AddItem $target 16943
        ::AddItem $target 16950
        ::AddItem $target 16945
	::AddItem $target 16948
	::AddItem $target 16949
        ::AddItem $target 16947
        ::AddItem $target 16946
	return [ ::Texts::Get "Du hast jetzt das tier 2 Schamanen set" ]
}

#	proc ::WoWEmu::Commands::t2priest { player cargs }
#
proc ::WoWEmu::Commands::t2priest { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16919
	::AddItem $target 16920
        ::AddItem $target 16921
        ::AddItem $target 16922
	::AddItem $target 16923
	::AddItem $target 16924
        ::AddItem $target 16925
        ::AddItem $target 16926
	return [ ::Texts::Get "Du hast jetzt das tier 2 Priester set" ]
}

#	proc ::WoWEmu::Commands::t2druid { player cargs }
#
proc ::WoWEmu::Commands::t2druid { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16897
	::AddItem $target 16898
        ::AddItem $target 16899
        ::AddItem $target 16900
	::AddItem $target 16901
	::AddItem $target 16902
        ::AddItem $target 16903
        ::AddItem $target 16904
	return [ ::Texts::Get "Du hast jetzt das tier 2 Druiden set" ]
}

#	proc ::WoWEmu::Commands::t2mage { player cargs }
#
proc ::WoWEmu::Commands::t2mage { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16818
	::AddItem $target 16912
        ::AddItem $target 16913
        ::AddItem $target 16915
	::AddItem $target 16916
	::AddItem $target 16917
        ::AddItem $target 16918
        ::AddItem $target 16914
	return [ ::Texts::Get "Du hast jetzt das tier 2 magier set" ]
}

#	proc ::WoWEmu::Commands::t2warlock { player cargs }
#
proc ::WoWEmu::Commands::t2warlock { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16927
	::AddItem $target 16928
        ::AddItem $target 16929
        ::AddItem $target 16930
	::AddItem $target 16931
	::AddItem $target 16932
        ::AddItem $target 16933
        ::AddItem $target 16934
	return [ ::Texts::Get "Du hast jetzt das tier 2 Hexenmeister set" ]
}

#	proc ::WoWEmu::Commands::t2hunter { player cargs }
#
proc ::WoWEmu::Commands::t2hunter { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16935
	::AddItem $target 16936
        ::AddItem $target 16937
        ::AddItem $target 16938
	::AddItem $target 16939
	::AddItem $target 16940
        ::AddItem $target 16941
        ::AddItem $target 16942
	return [ ::Texts::Get "Du hast jetzt das tier 2 Jaeger set" ]
}

#	proc ::WoWEmu::Commands::t2rogue { player cargs }
#
proc ::WoWEmu::Commands::t2rogue { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16832
	::AddItem $target 16905
        ::AddItem $target 16906
        ::AddItem $target 16907
	::AddItem $target 16908
	::AddItem $target 16909
        ::AddItem $target 16910
        ::AddItem $target 16911
	return [ ::Texts::Get "Du hast jetzt das tier 2 Schurken set" ]
}


#	proc ::WoWEmu::Commands::t3warrior { player cargs }
#
proc ::WoWEmu::Commands::t3warrior { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22418
	::AddItem $target 22422
        ::AddItem $target 22417
        ::AddItem $target 22416
	::AddItem $target 22420
	::AddItem $target 22423
        ::AddItem $target 22421
        ::AddItem $target 22419
	return [ ::Texts::Get "Du hast jetzt das tier 3 Krieger set" ]
}

#	proc ::WoWEmu::Commands::t3druid { player cargs }
#
proc ::WoWEmu::Commands::t3druid { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22492
	::AddItem $target 22494
        ::AddItem $target 22493
        ::AddItem $target 22490
	::AddItem $target 22489
	::AddItem $target 22491
        ::AddItem $target 22488
        ::AddItem $target 22495
	return [ ::Texts::Get "Du hast jetzt das tier 3 Druiden set" ]
}


#	proc ::WoWEmu::Commands::t3hunter { player cargs }
#
proc ::WoWEmu::Commands::t3hunter { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22440
	::AddItem $target 22442
        ::AddItem $target 22441
        ::AddItem $target 22438 
	::AddItem $target 22437
	::AddItem $target 22439
        ::AddItem $target 22436
        ::AddItem $target 22443
	return [ ::Texts::Get "Du hast jetzt das tier 3 Jaeger set" ]
}

#	proc ::WoWEmu::Commands::t3shaman { player cargs }
#
proc ::WoWEmu::Commands::t3shaman { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22468
	::AddItem $target 22470
        ::AddItem $target 22469
        ::AddItem $target 22466
	::AddItem $target 22465
	::AddItem $target 22467
        ::AddItem $target 22464
        ::AddItem $target 22471
	return [ ::Texts::Get "Du hast jetzt das tier 3 Schamanen set" ]
}

#	proc ::WoWEmu::Commands::t3paladin { player cargs }
#
proc ::WoWEmu::Commands::t3paladin { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22430
	::AddItem $target 22431
        ::AddItem $target 22426
        ::AddItem $target 22428
	::AddItem $target 22427
	::AddItem $target 22429
        ::AddItem $target 22425
        ::AddItem $target 22424
	return [ ::Texts::Get "Du hast jetzt das tier 3 paladin set" ]
}


#	proc ::WoWEmu::Commands::t3warlock { player cargs }
#
proc ::WoWEmu::Commands::t3warlock { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22510
	::AddItem $target 22511
        ::AddItem $target 22506
        ::AddItem $target 22509
	::AddItem $target 22505
	::AddItem $target 22504
        ::AddItem $target 22508
        ::AddItem $target 22507
	return [ ::Texts::Get "Du hast jetzt das tier 3 Hexenmeister set" ]
}

#	proc ::WoWEmu::Commands::t3mage { player cargs }
#
proc ::WoWEmu::Commands::t3mage { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22502
	::AddItem $target 22503
        ::AddItem $target 22498
        ::AddItem $target 22501
	::AddItem $target 22497
	::AddItem $target 22496
        ::AddItem $target 22500
        ::AddItem $target 22499
	return [ ::Texts::Get "Du hast jetzt das tier 3 magier set" ]
}


#	proc ::WoWEmu::Commands::t3priest { player cargs }
#
proc ::WoWEmu::Commands::t3priest { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22515
	::AddItem $target 22516
        ::AddItem $target 22512
        ::AddItem $target 22513
	::AddItem $target 22517
	::AddItem $target 22514
        ::AddItem $target 22519
        ::AddItem $target 22518
	return [ ::Texts::Get "Du hast jetzt das tier 3 Priester set" ]
}


#	proc ::WoWEmu::Commands::t3rogue { player cargs }
#
proc ::WoWEmu::Commands::t3rogue { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 22483
	::AddItem $target 22476
        ::AddItem $target 22481
        ::AddItem $target 22478
	::AddItem $target 22477
	::AddItem $target 22479
        ::AddItem $target 22480
        ::AddItem $target 22482
	return [ ::Texts::Get "Du hast jetzt das tier 3 Schurken set" ]
}


#	proc ::WoWEmu::Commands::t1warrior { player cargs }
#
proc ::WoWEmu::Commands::t1warrior { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16867
	::AddItem $target 16868
        ::AddItem $target 16861
        ::AddItem $target 16862
	::AddItem $target 16863
	::AddItem $target 16864
        ::AddItem $target 16865
        ::AddItem $target 16866
	return [ ::Texts::Get "Du hast jetzt das tier 1 Krieger set" ]
}


#	proc ::WoWEmu::Commands::t1paladin { player cargs }
#
proc ::WoWEmu::Commands::t1paladin { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16858
	::AddItem $target 16859
        ::AddItem $target 16857
        ::AddItem $target 16853
	::AddItem $target 16860
	::AddItem $target 16854
        ::AddItem $target 16855
        ::AddItem $target 16856
	return [ ::Texts::Get "Du hast jetzt das tier 1 paladin set" ]
}

#	proc ::WoWEmu::Commands::t1druid { player cargs }
#
proc ::WoWEmu::Commands::t1druid { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16828
	::AddItem $target 16829
        ::AddItem $target 16830
        ::AddItem $target 16833
	::AddItem $target 16831
	::AddItem $target 16834
        ::AddItem $target 16835
        ::AddItem $target 16836
	return [ ::Texts::Get "Du hast jetzt das tier 1 Druiden set" ]
}

#	proc ::WoWEmu::Commands::t1hunter { player cargs }
#
proc ::WoWEmu::Commands::t1hunter { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16851
	::AddItem $target 16849
        ::AddItem $target 16850
        ::AddItem $target 16845
	::AddItem $target 16848
	::AddItem $target 16852
        ::AddItem $target 16846
        ::AddItem $target 16847
	return [ ::Texts::Get "Du hast jetzt das tier 1 Jaeger set" ]
}

#	proc ::WoWEmu::Commands::maxskill { player cargs }
#
proc ::WoWEmu::Commands::maxskill { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}
        
	::LearnSpell $target 201
	::SetSkill $target 43 1275 1275
	::LearnSpell $target 196
	::SetSkill $target 44 1275 1275
	::LearnSpell $target 197
	::SetSkill $target 172 1275 1275
	::LearnSpell $target 202
	::SetSkill $target 55 1275 1275
	::LearnSpell $target 198
	::SetSkill $target 54 1275 1275
	::LearnSpell $target 199
	::SetSkill $target 160 1275 1275
	::LearnSpell $target 200
	::SetSkill $target 229 1275 1275
	::LearnSpell $target 9115
	::LearnSpell $target 227
	::SetSkill $target 136 1275 1275
	::LearnSpell $target 1180
	::SetSkill $target 173 1275 1275
	::LearnSpell $target 5009
	::LearnSpell $target 15590
	::SetSkill $target 473 1275 1275
	::SetSkill $target 95 1275 1275
	::LearnSpell $target 264
	::SetSkill $target 45 1275 1275
	::LearnSpell $target 5011
	::SetSkill $target 226 1275 1275
	::LearnSpell $target 266
	::SetSkill $target 46 1275 1275
	::LearnSpell $target 2567
	::SetSkill $target  176 1275 1275 
	::SetSkill $target 162 1275 1275
	return [ ::Texts::Get "you know learn use all weapon with max skills" ]
}

#	proc ::WoWEmu::Commands::t1mage { player cargs }
#
proc ::WoWEmu::Commands::t1mage { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16802
	::AddItem $target 16799
        ::AddItem $target 16795
        ::AddItem $target 16800
	::AddItem $target 16801
	::AddItem $target 16796
        ::AddItem $target 16797
        ::AddItem $target 16798
	return [ ::Texts::Get "Du hast jetzt das tier 1 magier set" ]
}


#	proc ::WoWEmu::Commands::t1priest { player cargs }
#
proc ::WoWEmu::Commands::t1priest { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16811
	::AddItem $target 16813
        ::AddItem $target 16817
        ::AddItem $target 16812
	::AddItem $target 16814
	::AddItem $target 16816
        ::AddItem $target 16815
        ::AddItem $target 16819
	return [ ::Texts::Get "Du hast jetzt das tier 1 Priester set" ]
}

#	proc ::WoWEmu::Commands::t1rogue { player cargs }
#
proc ::WoWEmu::Commands::t1rogue { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16827
	::AddItem $target 16824
        ::AddItem $target 16825
        ::AddItem $target 16820
	::AddItem $target 16821
	::AddItem $target 16826
        ::AddItem $target 16822
        ::AddItem $target 16823
	return [ ::Texts::Get "Du hast jetzt das tier 1 Schurken set" ]
}


#	proc ::WoWEmu::Commands::t1shaman { player cargs }
#
proc ::WoWEmu::Commands::t1shaman { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16838
	::AddItem $target 16837
        ::AddItem $target 16840
        ::AddItem $target 16841
	::AddItem $target 16844
	::AddItem $target 16839
        ::AddItem $target 16842
        ::AddItem $target 16843
	return [ ::Texts::Get "Du hast jetzt das tier 1 Schamanen set" ]
}


#	proc ::WoWEmu::Commands::t1warlock { player cargs }
#
proc ::WoWEmu::Commands::t1warlock { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 4 } {
		return [ ::Texts::Get "Nur fuer GM's!" ]
	}

	::AddItem $target 16806
	::AddItem $target 16804
        ::AddItem $target 16805
        ::AddItem $target 16810
	::AddItem $target 16809
	::AddItem $target 16807
        ::AddItem $target 16808
        ::AddItem $target 16803
	return [ ::Texts::Get "Du hast jetzt das tier 1 Hexenmeister set" ]
}

#	proc ::WoWEmu::Commands::delbs { player cargs }
#
proc ::WoWEmu::Commands::delbs { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260000
        return [ ::Texts::Get "Du hast Schmiedekunst verlernt!" ]
}



#	proc ::WoWEmu::Commands::delalchemy { player cargs }
#
proc ::WoWEmu::Commands::delalchemy { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260001
        return [ ::Texts::Get "Du hast Alchimi verlernt!" ]
}


#	proc ::WoWEmu::Commands::delenchant { player cargs }
#
proc ::WoWEmu::Commands::delenchant { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260002
        return [ ::Texts::Get "Du hast Verzauberkunst verlernt!" ]
}



#	proc ::WoWEmu::Commands::delherbalism { player cargs }
#
proc ::WoWEmu::Commands::delherbalism { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260003
        return [ ::Texts::Get "Du hast Kraeuterkunde verlernt!" ]
}


#	proc ::WoWEmu::Commands::delleatherw { player cargs }
#
proc ::WoWEmu::Commands::delleatherw { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260004
        return [ ::Texts::Get "Du hast Lederverarbeitung verlernt!" ]
}


#	proc ::WoWEmu::Commands::delMining { player cargs }
#
proc ::WoWEmu::Commands::delMining { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260005
        return [ ::Texts::Get "Du hast Bergbau verlernt!" ]
}


#	proc ::WoWEmu::Commands::delSkining { player cargs }
#
proc ::WoWEmu::Commands::delSkining { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260006
        return [ ::Texts::Get "Du hast Kuerschnerei verlernt!" ]
}


#	proc ::WoWEmu::Commands::delTailoring { player cargs }
#
proc ::WoWEmu::Commands::delTailoring { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260007
        return [ ::Texts::Get "Du hast Schneiderei verlernt!" ]
}


#	proc ::WoWEmu::Commands::delEngineering { player cargs }
#
proc ::WoWEmu::Commands::delEngineering { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260008
        return [ ::Texts::Get "Du hast Ingenieurskunst verlernt!" ]
}


#	proc ::WoWEmu::Commands::delfaid { player cargs }
#
proc ::WoWEmu::Commands::delfaid { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260009
        return [ ::Texts::Get "Du hast Erste Hilfe verlernt!" ]
}


#	proc ::WoWEmu::Commands::delCooking { player cargs }
#
proc ::WoWEmu::Commands::delCooking { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260010
        return [ ::Texts::Get "Du hast Kochkunst verlernt!" ]
}


#	proc ::WoWEmu::Commands::delFishing { player cargs }
#
proc ::WoWEmu::Commands::delFishing { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 260011
        return [ ::Texts::Get "Du hast Angeln verlernt!" ]
}

#	proc ::WoWEmu::Commands::deltale { player cargs }
#
proc ::WoWEmu::Commands::deltale { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen!" ]
	}

	if { [ ::GetPlevel $target ] < 0 } {
		return [ ::Texts::Get "looooooooool !!" ]
	}
	::LearnSpell $target 14867
        return [ ::Texts::Get "Du hast alle Talente verlernt!" ]
}
#
#	proc ::WoWEmu::Commands:res { player cargs }
#
proc ::WoWEmu::Commands::res { player cargs } {
	if { ! $::WoWEmu::ALLOW_RESURRECT_PLAYERS } {
		if { [ ::GetSelection $player ] != $player } {
			return [ ::Texts::Get "not_allowed_players" ]
		}
	}

	return ".resurrect $cargs"
}
#
#	proc ::WoWEmu::Commands::sd { player cargs }
#
proc ::WoWEmu::Commands::sd { player cargs } {
	return ".setspawndist $cargs"
}
#
#	proc ::WoWEmu::Commands::st { player cargs }
#
proc ::WoWEmu::Commands::st { player cargs } {
	return ".setspawntime $cargs"
}
#	proc ::WoWEmu::Commands::apdruid { player cargs }
#
proc ::WoWEmu::Commands::apdruid { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16452
	::AddItem $target 16451
        ::AddItem $target 16449
        ::AddItem $target 16459
	::AddItem $target 16448
	::AddItem $target 16450
	return [ ::Texts::Get "Du hast jetzt das Allianz Druiden pvp set!" ]
}
#	proc ::WoWEmu::Commands::hpdruid { player cargs }
#
proc ::WoWEmu::Commands::hpdruid { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16554
	::AddItem $target 16555
        ::AddItem $target 16552
        ::AddItem $target 16551
	::AddItem $target 16549
	::AddItem $target 16550
	return [ ::Texts::Get "Du hast jetzt das Horde Druiden pvp set!" ]
}
#	proc ::WoWEmu::Commands::hphunter { player cargs }
#
proc ::WoWEmu::Commands::hphunter { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16569
	::AddItem $target 16571
        ::AddItem $target 16567
        ::AddItem $target 16565
	::AddItem $target 16566
	::AddItem $target 16568
	return [ ::Texts::Get "Du hast jetzt das Horde Jaeger pvp set!" ]
}

#	proc ::WoWEmu::Commands::aphunter { player cargs }
#
proc ::WoWEmu::Commands::aphunter { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16466
	::AddItem $target 16465
        ::AddItem $target 16468
        ::AddItem $target 16462
	::AddItem $target 16463
	::AddItem $target 16467
	return [ ::Texts::Get "Du hast jetzt das Allianz Jaeger pvp set!" ]
}

#	proc ::WoWEmu::Commands::hpmage { player cargs }
#
proc ::WoWEmu::Commands::hpmage { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16536
	::AddItem $target 16533
        ::AddItem $target 16535
        ::AddItem $target 16539
	::AddItem $target 16540
	::AddItem $target 16534
	return [ ::Texts::Get "Du hast jetzt das Horde Magier pvp set!" ]
}

#	proc ::WoWEmu::Commands::apmage { player cargs }
#
proc ::WoWEmu::Commands::apmage { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16441
	::AddItem $target 16444
        ::AddItem $target 16443
        ::AddItem $target 16437
	::AddItem $target 16440
	::AddItem $target 16442
	return [ ::Texts::Get "Du hast jetzt das Allianz Magier pvp set!" ]
}

#	proc ::WoWEmu::Commands::pvpaladin { player cargs }
#
proc ::WoWEmu::Commands::pvpaladin { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16473
	::AddItem $target 16474
        ::AddItem $target 16476
        ::AddItem $target 16472
	::AddItem $target 16471
	::AddItem $target 16475
	return [ ::Texts::Get "Du hast jetzt das Paladin pvp set!" ]
}

#	proc ::WoWEmu::Commands::appriest { player cargs }
#
proc ::WoWEmu::Commands::appriest { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 17604
	::AddItem $target 17603
        ::AddItem $target 17605
        ::AddItem $target 17608
	::AddItem $target 17607
	::AddItem $target 17602
	return [ ::Texts::Get "Du hast jetzt das Allianz Priester pvp set!" ]
}

#	proc ::WoWEmu::Commands::hppriest { player cargs }
#
proc ::WoWEmu::Commands::hppriest { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 17623
	::AddItem $target 17625
        ::AddItem $target 17622
        ::AddItem $target 17624
	::AddItem $target 17618
	::AddItem $target 17620
	return [ ::Texts::Get "Du hast jetzt das Horde Priester pvp set!" ]
}

#	proc ::WoWEmu::Commands::hprogue { player cargs }
#
proc ::WoWEmu::Commands::hprogue { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16563
	::AddItem $target 16561
        ::AddItem $target 16562
        ::AddItem $target 16564
	::AddItem $target 16560
	::AddItem $target 16558
	return [ ::Texts::Get "Du hast jetzt das Horde Schurken pvp set!" ]
}


#	proc ::WoWEmu::Commands::aprogue { player cargs }
#
proc ::WoWEmu::Commands::aprogue { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16453
	::AddItem $target 16457
        ::AddItem $target 16455
        ::AddItem $target 16446
	::AddItem $target 16454
	::AddItem $target 16456
	return [ ::Texts::Get "Du hast jetzt das Allianz Schurken pvp set!" ]
}

#	proc ::WoWEmu::Commands::pvshaman { player cargs }
#
proc ::WoWEmu::Commands::pvshaman { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16577
	::AddItem $target 16578
        ::AddItem $target 16580
        ::AddItem $target 16573
	::AddItem $target 16574
	::AddItem $target 16579
	return [ ::Texts::Get "Du hast jetzt das Schamanen pvp set!" ]
}

#	proc ::WoWEmu::Commands::hpwarlock { player cargs }
#
proc ::WoWEmu::Commands::hpwarlock { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 17586
	::AddItem $target 17588
        ::AddItem $target 17593
        ::AddItem $target 17591
	::AddItem $target 17590
	::AddItem $target 17592
	return [ ::Texts::Get "Du hast jetzt das Horde Hexenmeister pvp set!" ]
}

#	proc ::WoWEmu::Commands::apwarlock { player cargs }
#
proc ::WoWEmu::Commands::apwarlock { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 17581
	::AddItem $target 17580
        ::AddItem $target 17583
        ::AddItem $target 17584
	::AddItem $target 17579
	::AddItem $target 17578
	return [ ::Texts::Get "Du hast jetzt das Allianz Hexenmeister pvp set!" ]
}

#	proc ::WoWEmu::Commands::hpwarrior { player cargs }
#
proc ::WoWEmu::Commands::hpwarrior { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16541
	::AddItem $target 16542
        ::AddItem $target 16544
        ::AddItem $target 16545
	::AddItem $target 16548
	::AddItem $target 16543
	return [ ::Texts::Get "Du hast jetzt das Horde Krieger pvp set!" ]
}


#	proc ::WoWEmu::Commands::apwarrior { player cargs }
#
proc ::WoWEmu::Commands::apwarrior { player cargs } {
	set target [ ::GetSelection $player ]

	if { [ ::GetObjectType $target ] != 4 } {
		return [ ::Texts::Get "Du musst einen Spieler auswaehlen" ]
	}

	if { [ ::GetPlevel $target ] < 2 } {
		return [ ::Texts::Get "Der Spieler muss mindestens Plevel 2 besitzen!" ]
	}

	::AddItem $target 16477
	::AddItem $target 16478
        ::AddItem $target 16480
        ::AddItem $target 16483
	::AddItem $target 16484
	::AddItem $target 16479
	return [ ::Texts::Get "Du hast jetzt das Allianz Krieger pvp set!" ]
}

#
::Custom::LogCommand {
  "spellmage1"
	"learnallform"
	"maxskill"
	"t2paladin"
	"t3paladin"
	"t1paladin"
	"t2warrior"
	"t3warrior"
        "t1warrior"
        "t3druid"
        "t2druid"
        "t1druid"
}

::StartTCL::Provide AOcommands